/* Processed by ecpg (regression mode) */
/* These include files are added by the preprocessor */
#include <ecpglib.h>
#include <ecpgerrno.h>
#include <sqlca.h>
/* End of automatic include section */
#define ECPGdebug(X, Y) ECPGdebug((X) + 100, (Y))

#line 1 "define.pgc"
#include <stdlib.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>

#line 1 "regression.h"

#line 6 "define.pgc"

/* exec sql whenever sqlerror  sqlprint ; */
#line 8 "define.pgc"

/* exec sql type intarray is int [ 6 ] */
#line 13 "define.pgc"

typedef int intarray[6];

int main(void)
{
    /* exec sql begin declare section */

    typedef char string[8];

#line 21 "define.pgc"

#line 22 "define.pgc"
    intarray amount;

#line 23 "define.pgc"
    char name[6][8];

#line 24 "define.pgc"
    char letter[6][1];

/* exec sql end declare section */
#line 29 "define.pgc"

    int i, j;

    ECPGdebug(1, stderr);

    {
        ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
#line 34 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 34 "define.pgc"

    {
        ECPGdo(__LINE__,
            0,
            1,
            NULL,
            0,
            ECPGst_normal,
            "create table test ( name char ( 8 ) , amount int , letter char ( 1 ) )",
            ECPGt_EOIT,
            ECPGt_EORT);
#line 36 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 36 "define.pgc"

    {
        ECPGtrans(__LINE__, NULL, "commit");
#line 37 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 37 "define.pgc"

    {
        ECPGdo(__LINE__,
            0,
            1,
            NULL,
            0,
            ECPGst_normal,
            "insert into Test ( name , amount , letter ) values ( 'false' , 1 , 'f' )",
            ECPGt_EOIT,
            ECPGt_EORT);
#line 39 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 39 "define.pgc"

    {
        ECPGdo(__LINE__,
            0,
            1,
            NULL,
            0,
            ECPGst_normal,
            "insert into test ( name , amount , letter ) values ( 'true' , 2 , 't' )",
            ECPGt_EOIT,
            ECPGt_EORT);
#line 40 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 40 "define.pgc"

    {
        ECPGtrans(__LINE__, NULL, "commit");
#line 41 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 41 "define.pgc"

    {
        ECPGdo(__LINE__,
            0,
            1,
            NULL,
            0,
            ECPGst_normal,
            "select * from test",
            ECPGt_EOIT,
            ECPGt_char,
            (name),
            (long)8,
            (long)6,
            (8) * sizeof(char),
            ECPGt_NO_INDICATOR,
            NULL,
            0L,
            0L,
            0L,
            ECPGt_int,
            (amount),
            (long)1,
            (long)6,
            sizeof(int),
            ECPGt_NO_INDICATOR,
            NULL,
            0L,
            0L,
            0L,
            ECPGt_char,
            (letter),
            (long)1,
            (long)6,
            (1) * sizeof(char),
            ECPGt_NO_INDICATOR,
            NULL,
            0L,
            0L,
            0L,
            ECPGt_EORT);
#line 43 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 43 "define.pgc"

    for (i = 0, j = sqlca.sqlerrd[2]; i < j; i++) {
        /* exec sql begin declare section */

#line 48 "define.pgc"
        char n[8], l = letter[i][0];

#line 49 "define.pgc"
        int a = amount[i];
/* exec sql end declare section */
#line 50 "define.pgc"

        strncpy(n, name[i], 8);
        printf("name[%d]=%8.8s\tamount[%d]=%d\tletter[%d]=%c\n", i, n, i, a, i, l);
    }

    {
        ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "drop table test", ECPGt_EOIT, ECPGt_EORT);
#line 56 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 56 "define.pgc"

    {
        ECPGtrans(__LINE__, NULL, "commit");
#line 57 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 57 "define.pgc"

    {
        ECPGdisconnect(__LINE__, "CURRENT");
#line 58 "define.pgc"

        if (sqlca.sqlcode < 0)
            sqlprint();
    }
#line 58 "define.pgc"

    return (0);
}
